1st Multimedia Mac Shareware/Multimedia Shareware CD-ROM - BetaCorp.iso/StackToolsƒ/XCMDƒ/Get⁄Set/Get⁄SetInvisible 1.0/Get_SetInvisible 1.0/cards.xml

Text File | 1991-09-01 | 4.5 KB | 116 lines

card_2839.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>2839</id>
    <filler1>0</filler1>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2788</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_3217.css" />
    <part>
        <id>9</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>4</left>
            <top>94</top>
            <right>228</right>
            <bottom>304</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Helvetica</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name></name>
        <script></script>
    </part>
    <part>
        <id>19</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>4</left>
            <top>65</top>
            <right>104</right>
            <bottom>87</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>GetInvisible</name>
        <script>on mouseUp
put getpathname() into appname
if appname = "" then exit to hypercard
get GetInvisible(appname)
if the number of chars of it ≤ 5 then
answer "The invisible flag of “" & appname & "” is" && it & "."
else
answer it with "Sorry"
end if
end mouseUp
</script>
    </part>
    <part>
        <id>20</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>127</left>
            <top>65</top>
            <right>227</right>
            <bottom>87</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>SetInvisible</name>
        <script>on mouseUp
put getpathname() into appname
if appname = "" then exit to hypercard
if getInvisible(appname) then
answer "Change Invisible flag to what?" with "True" or "False"
else
answer "Change Invisible flag to what?" with "False" or "True"
end if
setInvisible appname,it
if the result ≠ "" then answer the result with "Sorry"
end mouseUp
</script>
    </part>
    <content>
        <layer>card</layer>
        <id>9</id>
        <text><span class="style1">etInvisible takes one parameter, the pathname of the file you want to examine. SetInvisible takes two parameters, the pathname of the file and TRUE or FALSE indicating your choice of setting. Click on and/or examine the scripts of the buttons above to see how it works!

A small shareware fee of $5.00 is requested if you use these externals in any “in house”, shareware or freeware products. The registration fee for development and prototyping of a future commercial product is $10.  The registration fee for unlimited commercial use in a SINGLE “for sale” product is $15.  The fee for unlimited commercial use with MULTIPLE products is $25.   These are life-time registrations.  You are entitled to all future shareware updates without further cost.

For additional information you can contact us in any of the following ways:
</span><span class="style2">America Online:  ProX Jeff
GEnie:           APOSTASY
Compuserve:      76675,1772
AppleLink:       ALL.AMERICAN
</span><span class="style3">All-American Software Development Corp.
P. O. Box 50635
Minneapolis MN  55405-0635
</span></text>
    </content>
    <name></name>
    <script></script>
</card>